home *** CD-ROM | disk | FTP | other *** search
- object FTPForm: TFTPForm
- Left = 207
- Top = 122
- Width = 488
- Height = 338
- Caption = 'TmsFTPClient Component Demo'
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'System'
- Font.Style = []
- Menu = MainMenu1
- Position = poDefaultPosOnly
- OnClose = FormClose
- OnCreate = FormCreate
- PixelsPerInch = 96
- TextHeight = 16
- object ToolBar: TPanel
- Left = 0
- Top = 0
- Width = 480
- Height = 41
- Align = alTop
- TabOrder = 0
- object ConnectButton: TSpeedButton
- Tag = 1
- Left = 4
- Top = 8
- Width = 25
- Height = 25
- Hint = 'Connect'
- Glyph.Data = {
- 76010000424D7601000000000000760000002800000020000000100000000100
- 04000000000000010000120B0000120B00001000000000000000000000000000
- 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
- 3333333333FFFFF3333333333000003333333333F777773FF333333008877700
- 33333337733FFF773F33330887000777033333733F777FFF73F330880FAFAF07
- 703337F37733377FF7F33080F00000F07033373733777337F73F087F00A2200F
- 77037F3737333737FF7F080A0A2A220A07037F737F3333737F7F0F0F0AAAA20F
- 07037F737F3333737F7F0F0A0FAA2A0A08037F737FF33373737F0F7F00FFA00F
- 780373F737FFF737F3733080F00000F0803337F73377733737F330F80FAFAF08
- 8033373F773337733733330F8700078803333373FF77733F733333300FFF8800
- 3333333773FFFF77333333333000003333333333377777333333}
- NumGlyphs = 2
- ParentShowHint = False
- ShowHint = True
- OnClick = ConnectButtonClick
- end
- object DisconnectButton: TSpeedButton
- Tag = 2
- Left = 36
- Top = 8
- Width = 25
- Height = 25
- Hint = 'Disconnect'
- Glyph.Data = {
- 76010000424D7601000000000000760000002800000020000000100000000100
- 04000000000000010000120B0000120B00001000000000000000000000000000
- 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
- 3333333333FFFFF3333333333000003333333333F777773FF333333008877700
- 33333337733FFF773F33330887000777033333733F777FFF73F330880F9F9F07
- 703337F37733377FF7F33080F00000F07033373733777337F73F087F0091100F
- 77037F3737333737FF7F08090919110907037F737F3333737F7F0F0F0999910F
- 07037F737F3333737F7F0F090F99190908037F737FF33373737F0F7F00FF900F
- 780373F737FFF737F3733080F00000F0803337F73377733737F330F80F9F9F08
- 8033373F773337733733330F8700078803333373FF77733F733333300FFF8800
- 3333333773FFFF77333333333000003333333333377777333333}
- NumGlyphs = 2
- ParentShowHint = False
- ShowHint = True
- OnClick = DisconnectButtonClick
- end
- object ChDirButton: TSpeedButton
- Tag = 2
- Left = 68
- Top = 8
- Width = 25
- Height = 25
- Hint = 'Change Directory'
- Glyph.Data = {
- 06020000424D0602000000000000760000002800000028000000140000000100
- 0400000000009001000000000000000000001000000000000000000000000000
- 8000008000000080800080000000800080008080000080808000C0C0C0000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
- 3333333333333333333333333333333333333333333333333333333333333333
- 3333333333333333333333333333333333333333333333333333333333333333
- 3333333333333333333333333333333333333333333333FFFFFFFFFF33333333
- 30000000000333333333377777777773F33333330BFBFBFBFBF0333333337F33
- 33333337F33333330FBFBFBFBFB0333333337F3333333337F33333330BFBFBFB
- FBF0333333337F3333333337F33333330FBFBFBFBFB0333333337F3333333337
- F33333330BFBFBFBFBF0333333337F3333333337F33333330FBFBFBFBFB03333
- 33337FFFFF333337F333333300000BFBFBF033333333777773FFFFF733333333
- 0FBFB00000033333333373FFF777777333333333300003333333333333333777
- 7333333333333333333333333333333333333333333333333333333333333333
- 3333333333333333333333333333333333333333333333333333333333333333
- 3333333333333333333333333333333333333333333333333333333333333333
- 33333333333333333333}
- NumGlyphs = 2
- ParentShowHint = False
- ShowHint = True
- OnClick = ChDirButtonClick
- end
- object UpdButton: TSpeedButton
- Tag = 2
- Left = 100
- Top = 8
- Width = 25
- Height = 25
- Hint = 'Upper Directory'
- Glyph.Data = {
- 76010000424D7601000000000000760000002800000020000000100000000100
- 04000000000000010000120B0000120B00001000000000000000000000000000
- 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333000333
- 3333333333777F33333333333309033333333333337F7F333333333333090333
- 33333333337F7F33333333333309033333333333337F7F333333333333090333
- 33333333337F7F33333333333309033333333333FF7F7FFFF333333000090000
- 3333333777737777F333333099999990333333373F3333373333333309999903
- 333333337F33337F33333333099999033333333373F333733333333330999033
- 3333333337F337F3333333333099903333333333373F37333333333333090333
- 33333333337F7F33333333333309033333333333337373333333333333303333
- 333333333337F333333333333330333333333333333733333333}
- NumGlyphs = 2
- ParentShowHint = False
- ShowHint = True
- OnClick = UpdButtonClick
- end
- object RetrieveFileButton: TSpeedButton
- Tag = 2
- Left = 132
- Top = 8
- Width = 25
- Height = 25
- Hint = 'Retrieve File'
- Glyph.Data = {
- 06020000424D0602000000000000760000002800000028000000140000000100
- 0400000000009001000000000000000000001000000000000000000000000000
- 8000008000000080800080000000800080008080000080808000C0C0C0000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
- 3333333333FFFFFFFFFFF333333330000000000033333333377777777777F333
- 33333087777777703333333337F777777777F333333330F88888887033333333
- 37F333333377F333333330F9988888703333333337F333333377F333333330FF
- FFFFFF803333333337FFFFFFFFF7F33333333000000000003333333337777777
- 7777333333333333333333333333333333FF3333333333333333300333333333
- 33333333377F333333333333333330033333333333333333377F333333FFFFFF
- FFF330033333300000000033377F3F3337777777773F300303330FBFBFBFBF03
- 377F7FF37F333333337F300700330BFBFBFBFB03377777FF7F333333337F3700
- 00030FBFBFBFBF033777777F7F333333337F337000030BFBFBFBFB0333777773
- 7F333333337F333300330FBFBFBFBF03333377337FFFFF33337F333303330000
- 0BFBFB0333337333777773FFFF73333333330FBFB00000333333333373FFF777
- 7733333333333000033333333333333337777333333333333333333333333333
- 33333333333333333333}
- NumGlyphs = 2
- ParentShowHint = False
- ShowHint = True
- OnClick = RetrieveFileButtonClick
- end
- object StoreFileButton: TSpeedButton
- Tag = 2
- Left = 164
- Top = 8
- Width = 25
- Height = 25
- Hint = 'Store File'
- Glyph.Data = {
- 06020000424D0602000000000000760000002800000028000000140000000100
- 0400000000009001000000000000000000001000000000000000000000000000
- 8000008000000080800080000000800080008080000080808000C0C0C0000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
- 33333333333333333FFFFFFFFFFF333333330000000000033333333377777777
- 777F33333333087777777703333333337F777777777F333333330F8888888703
- 333333337F333333377F333333330F9988888703333333337F333333377F3333
- 33330FFFFFFFF803333333337FFFFFFFFF7F3333333300000000000333333333
- 777777777773333333333333333333333333333333333333FF33333333333333
- 3330033333333333333333377FF333333333333333000033333FFFFFFFFF3377
- 77FF33000000000330000003337777777773F777777330FBFBFBFBF033300333
- 37F333333337F3377F3330BFBFBFBFB03330033337F333333337F3377F3330FB
- FBFBFBF03370033337F333333337F3777F3330BFBFBFBFB03000733337F33333
- 3337F777733330FBFBFBFBF03007333337FFFFF33337F7773333300000BFBFB0
- 333333333777773FFFF73333333330FBFB00000333333333373FFF7777733333
- 3333330000333333333333333377773333333333333333333333333333333333
- 33333333333333333333}
- NumGlyphs = 2
- ParentShowHint = False
- ShowHint = True
- OnClick = StoreFileButtonClick
- end
- object MkDirButton: TSpeedButton
- Tag = 2
- Left = 228
- Top = 8
- Width = 25
- Height = 25
- Hint = 'Make Directory'
- Glyph.Data = {
- 06020000424D0602000000000000760000002800000028000000140000000100
- 0400000000009001000000000000000000001000000000000000000000000000
- 8000008000000080800080000000800080008080000080808000C0C0C0000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
- 333333333333333333F33333333333333333303333333333333F333337F33333
- 33F3330333333033333330333373F33337333333373333303333333333330333
- 3337333333333333733333333333333333333333333333FFFFFFFFFF33333333
- 30000000000333333333377777777773F33333330BFBFBFBFBF0333333337F33
- 33333337F33333330FBFBFBFBFB0333333337F3333333337F33333330BFBFBFB
- FBF0333333337F3333333337F3FF33330FBFBFBFBFB0300333FF7F3333333337
- F77330030BFBFBFBFBF0333337737F3333333337F33333330FBFBFBFBFB03333
- 33337FFFFF333337F333333300000BFBFBF033333333777773FFFFF733333333
- 0FBFB00000033333333373FFF777777333333333300003333333333333333777
- 733333333333333333333333333333333333F333333333333F33333033333333
- 3333033333373333333F333373F33303333333033333303333733333337F3333
- 3733333333333303333333333333333333733333333333333333333333333333
- 33333333333333333333}
- NumGlyphs = 2
- ParentShowHint = False
- ShowHint = True
- OnClick = MkDirButtonClick
- end
- object DeleteButton: TSpeedButton
- Tag = 2
- Left = 260
- Top = 8
- Width = 25
- Height = 25
- Hint = 'Delete'
- Glyph.Data = {
- 76010000424D7601000000000000760000002800000020000000100000000100
- 04000000000000010000120B0000120B00001000000000000000000000000000
- 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
- 55555FFFFFFF5F55FFF5777777757559995777777775755777F7555555555550
- 305555555555FF57F7F555555550055BB0555555555775F777F55555550FB000
- 005555555575577777F5555550FB0BF0F05555555755755757F555550FBFBF0F
- B05555557F55557557F555550BFBF0FB005555557F55575577F555500FBFBFB0
- B05555577F555557F7F5550E0BFBFB00B055557575F55577F7F550EEE0BFB0B0
- B05557FF575F5757F7F5000EEE0BFBF0B055777FF575FFF7F7F50000EEE00000
- B0557777FF577777F7F500000E055550805577777F7555575755500000555555
- 05555777775555557F5555000555555505555577755555557555}
- NumGlyphs = 2
- ParentShowHint = False
- ShowHint = True
- OnClick = DeleteButtonClick
- end
- object CancelButton: TSpeedButton
- Tag = 3
- Left = 292
- Top = 8
- Width = 25
- Height = 25
- Hint = 'Cancel'
- Glyph.Data = {
- CE070000424DCE07000000000000360000002800000024000000120000000100
- 1800000000009807000000000000000000000000000000000000008080008080
- 0080800080800080800080800080800080800080800080800080800080800080
- 8000808000808000808000808000808000808000808000808000808000808000
- 8080008080008080008080008080008080008080008080008080008080008080
- 0080800080800080800080800080800080808080808080800080800080800080
- 8000808000808000808000808000808000808000808000808000808000808000
- 8080008080008080008080F8F8F8008080008080008080008080008080008080
- 0080800080800080800080800080800080800080800080800080800000F80000
- 800000808080800080800080800080800080800080800000F880808000808000
- 8080008080008080008080008080008080008080808080808080F8F8F8008080
- 008080008080008080008080008080F8F8F80080800080800080800080800080
- 800080800080800000F800008000008000008080808000808000808000808000
- 00F8000080000080808080008080008080008080008080008080008080808080
- F8F8F8008080808080F8F8F8008080008080008080F8F8F8808080808080F8F8
- F80080800080800080800080800080800080800000F800008000008000008000
- 00808080800080800000F8000080000080000080000080808080008080008080
- 008080008080008080808080F8F8F8008080008080808080F8F8F8008080F8F8
- F8808080008080008080808080F8F8F800808000808000808000808000808000
- 80800000F8000080000080000080000080808080000080000080000080000080
- 000080808080008080008080008080008080008080808080F8F8F80080800080
- 80008080808080F8F8F8808080008080008080008080008080808080F8F8F800
- 80800080800080800080800080800080800000F8000080000080000080000080
- 0000800000800000800000808080800080800080800080800080800080800080
- 80008080808080F8F8F800808000808000808080808000808000808000808000
- 8080F8F8F8808080008080008080008080008080008080008080008080008080
- 0000F80000800000800000800000800000800000808080800080800080800080
- 80008080008080008080008080008080008080808080F8F8F800808000808000
- 8080008080008080008080F8F8F8808080008080008080008080008080008080
- 0080800080800080800080800080800000800000800000800000800000808080
- 8000808000808000808000808000808000808000808000808000808000808000
- 8080808080F8F8F8008080008080008080008080008080808080008080008080
- 0080800080800080800080800080800080800080800080800080800000F80000
- 8000008000008000008080808000808000808000808000808000808000808000
- 8080008080008080008080008080008080808080F8F8F8008080008080008080
- 8080800080800080800080800080800080800080800080800080800080800080
- 800080800000F800008000008000008000008000008080808000808000808000
- 8080008080008080008080008080008080008080008080008080008080808080
- 008080008080008080008080808080F8F8F80080800080800080800080800080
- 800080800080800080800080800000F800008000008000008080808000008000
- 0080000080808080008080008080008080008080008080008080008080008080
- 008080008080808080008080008080008080008080008080808080F8F8F80080
- 800080800080800080800080800080800080800080800000F800008000008000
- 00808080800080800000F8000080000080000080808080008080008080008080
- 008080008080008080008080008080808080008080008080008080808080F8F8
- F8008080008080808080F8F8F800808000808000808000808000808000808000
- 80800000F80000800000808080800080800080800080800000F8000080000080
- 000080808080008080008080008080008080008080008080808080F8F8F80080
- 80008080808080008080808080F8F8F8008080008080808080F8F8F800808000
- 80800080800080800080800080800080800000F8000080008080008080008080
- 0080800080800000F80000800000800000800080800080800080800080800080
- 80008080808080F8F8F8F8F8F8808080008080008080008080808080F8F8F800
- 8080008080808080F8F8F8008080008080008080008080008080008080008080
- 0080800080800080800080800080800080800080800000F80000800000F80080
- 8000808000808000808000808000808000808080808080808000808000808000
- 8080008080008080808080F8F8F8F8F8F8F8F8F8808080008080008080008080
- 0080800080800080800080800080800080800080800080800080800080800080
- 8000808000808000808000808000808000808000808000808000808000808000
- 8080008080008080008080008080008080008080008080808080808080808080
- 0080800080800080800080800080800080800080800080800080800080800080
- 8000808000808000808000808000808000808000808000808000808000808000
- 8080008080008080008080008080008080008080008080008080008080008080
- 008080008080008080008080008080008080}
- NumGlyphs = 2
- ParentShowHint = False
- ShowHint = True
- OnClick = CancelButtonClick
- end
- object ExitButton: TSpeedButton
- Left = 357
- Top = 8
- Width = 25
- Height = 25
- Hint = 'Exit'
- Glyph.Data = {
- BE060000424DBE06000000000000360400002800000024000000120000000100
- 0800000000008802000000000000000000000001000000000000000000000000
- BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000C0DCC000F0CA
- A600000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 0000000000000000000000000000000000000000000000000000000000000000
- 000000000000000000000000000000000000F0FBFF00A4A0A000808080000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF0003F8F8F8F8F8
- F8F8F8F80707FF07FF07F807FFF8F8F8F8F8F8F8F8F8F8030303030303FF0404
- 0404040000F8F8F8FFFFFF0404040404F8F8F8F8F8F8F8F8F8F8FF030303FFFF
- F8FF0303030304FD05000007FFFFFF0403030303F8F8F8F8F8F8F8F8F8F80303
- 03F8F8F8F8FF030303030405FD0500FFFFFFFF040303030303030303F8FFF8F8
- F8FF030303F8FF0303FF0303030304FD05FD00FFFFFFFF040303030303030303
- F8F807F8F8FF030303F8FF0303FF030303030405FD0500FFFEFFFE0403030303
- 03030303F8FFF807F8FF030303F8FF0303FF0303030304FD05FD00FFFFFFFF04
- 0303030303030303F8F807F8F8FF030303F8FF0303FF030303030405FD0500FF
- FEFFFE040303030303030303F8FFF807F8FF030303F8FF0303FF0303030304FD
- 05FD00FFFFFFFF040303030303030303F8F807F8F8FF030303F8FF0303FF0303
- 03030405FD0500FFFEFFFE040303030303030303F8FFF807F8FF030303F8FF03
- 03FF0303030304FD05FD00FEFFFEFF040303030303030303F8F807F8F8FF0303
- 03F8FF0303FF030303030405FD0500FFFEFFFE040303030303030303F8FFF807
- F8FF030303F8FF0303FF0303030304FD05FD00FEFFFEFF040303030303030303
- F8F807F8F8FF030303F8FF0303FF030303030404040404040404040403030303
- 03030303F8FFF8FFF8FFFFFFFFF8FF0303FF0303030303030303030303030303
- 0303030303030303F8F8F8F8F8F8F8F8F8F8030303FF03030303030300000000
- 000003030303030303030303030303FFFFFFFFFFFF03030303FF030303030303
- 00FAFAFAFA00030303030303030303030303F8F8F8F8F8F8FF03030303FF0303
- 03030303000000000000030303030303030303030303F8FFFFFFFFF8FF030303
- 03FF}
- NumGlyphs = 2
- ParentShowHint = False
- ShowHint = True
- OnClick = ExitButtonClick
- end
- object RenameButton: TSpeedButton
- Tag = 2
- Left = 196
- Top = 8
- Width = 25
- Height = 25
- Hint = 'Rename'
- Glyph.Data = {
- 76010000424D7601000000000000760000002800000020000000100000000100
- 0400000000000001000000000000000000001000000000000000000000000000
- 8000008000000080800080000000800080008080000080808000C0C0C0000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
- 3333333333FFFFF3333333333999993333333333F77777FFF333333999999999
- 3333333777333777FF3333999333339993333377333333777FF3399933333339
- 993337733333333377F3399333333333993337733333333337FF993333333333
- 399377F333333333377F993333333333399377F3333333333373993333333333
- 333377F3333333333333993333333333333377F33333333FFFFF993333333399
- 999377FF33333377777F3993333333399993373FF3333337777F399933333333
- 99933773F333333F777F339993333399999333773F333377777F333999999999
- 3393333777333777337333333999993333333333377777333333}
- NumGlyphs = 2
- ParentShowHint = False
- ShowHint = True
- OnClick = RenameButtonClick
- end
- object LogOnOffButton: TSpeedButton
- Left = 324
- Top = 8
- Width = 25
- Height = 25
- Hint = 'Log Window On/Off'
- AllowAllUp = True
- GroupIndex = -1
- Glyph.Data = {
- 76010000424D7601000000000000760000002800000020000000100000000100
- 04000000000000010000120B0000120B00001000000000000000000000000000
- 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333000000
- 000033333377777777773333330FFFFFFFF03FF3FF7FF33F3FF700300000FF0F
- 00F077F777773F737737E00BFBFB0FFFFFF07773333F7F3333F7E0BFBF000FFF
- F0F077F3337773F3F737E0FBFBFBF0F00FF077F3333FF7F77F37E0BFBF00000B
- 0FF077F3337777737337E0FBFBFBFBF0FFF077F33FFFFFF73337E0BF0000000F
- FFF077FF777777733FF7000BFB00B0FF00F07773FF77373377373330000B0FFF
- FFF03337777373333FF7333330B0FFFF00003333373733FF777733330B0FF00F
- 0FF03333737F37737F373330B00FFFFF0F033337F77F33337F733309030FFFFF
- 00333377737FFFFF773333303300000003333337337777777333}
- NumGlyphs = 2
- ParentShowHint = False
- ShowHint = True
- OnClick = LogOnOffButtonClick
- end
- end
- object StatusBar: TStatusBar
- Left = 0
- Top = 273
- Width = 480
- Height = 19
- Panels = <>
- SimplePanel = True
- end
- object LogMemo: TMemo
- Left = 0
- Top = 232
- Width = 480
- Height = 41
- Align = alBottom
- Color = clBtnFace
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- ReadOnly = True
- ScrollBars = ssVertical
- TabOrder = 1
- WordWrap = False
- end
- object FTPListView: TListView
- Left = 0
- Top = 41
- Width = 480
- Height = 191
- Align = alClient
- OnDblClick = FTPListViewDblClick
- Columns = <
- item
- Caption = 'Name'
- Width = 14720336
- end
- item
- Alignment = taRightJustify
- Caption = 'Size'
- Width = 14720336
- end
- item
- Caption = 'Date'
- Width = 14720336
- end>
- ReadOnly = False
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- MultiSelect = True
- TabOrder = 3
- ViewStyle = vsReport
- StateImages = ImageList1
- end
- object MainMenu1: TMainMenu
- Left = 324
- Top = 224
- object File1: TMenuItem
- Caption = '&File'
- ShortCut = 0
- OnClick = CancelButtonClick
- object Connect1: TMenuItem
- Tag = 1
- Caption = 'Co&nnect'
- ShortCut = 0
- OnClick = ConnectButtonClick
- end
- object Disconnect1: TMenuItem
- Tag = 3
- Caption = '&Disconnect'
- ShortCut = 0
- OnClick = DisconnectButtonClick
- end
- object Retrieve1: TMenuItem
- Tag = 3
- Caption = '&Retrieve'
- ShortCut = 0
- OnClick = RetrieveFileButtonClick
- end
- object Store1: TMenuItem
- Tag = 3
- Caption = '&Store'
- ShortCut = 0
- OnClick = StoreFileButtonClick
- end
- object Rename1: TMenuItem
- Tag = 3
- Caption = 'Re&name'
- ShortCut = 0
- OnClick = RenameButtonClick
- end
- object Delete1: TMenuItem
- Tag = 3
- Caption = '&Delete'
- ShortCut = 0
- OnClick = DeleteButtonClick
- end
- object Cancel1: TMenuItem
- Tag = 3
- Caption = '&Cancel'
- ShortCut = 0
- OnClick = CancelButtonClick
- end
- object N1: TMenuItem
- Caption = '-'
- ShortCut = 0
- end
- object Exit1: TMenuItem
- Tag = 1
- Caption = 'E&xit'
- ShortCut = 0
- OnClick = ExitButtonClick
- end
- end
- object Directory1: TMenuItem
- Caption = '&Directory'
- ShortCut = 0
- object Change1: TMenuItem
- Caption = 'Chan&ge'
- ShortCut = 0
- OnClick = ChDirButtonClick
- end
- object ChangeUp1: TMenuItem
- Caption = 'Change &Up'
- ShortCut = 0
- OnClick = UpdButtonClick
- end
- object Create1: TMenuItem
- Caption = '&Create'
- ShortCut = 0
- OnClick = MkDirButtonClick
- end
- end
- object Help1: TMenuItem
- Caption = '&Help'
- ShortCut = 0
- object About1: TMenuItem
- Caption = '&About'
- ShortCut = 0
- OnClick = About1Click
- end
- end
- end
- object OpenDialog1: TOpenDialog
- FileEditStyle = fsEdit
- Filter = 'All Files (*.*)|*.*'
- Title = 'Select a File to Store'
- Left = 348
- Top = 224
- end
- object SaveDialog1: TSaveDialog
- FileEditStyle = fsEdit
- Filter = 'All Files (*.*)|*.*'
- Title = 'Save Retrieved File as...'
- Left = 384
- Top = 224
- end
- object ImageList1: TImageList
- Left = 424
- Top = 8
- end
- object msFTPClient1: TmsFTPClient
- Version = '2.0'
- OnConnected = msFTPClient1Connected
- OnDisconnected = msFTPClient1Disconnected
- Port = 21
- OnConnecting = msFTPClient1Connecting
- PassiveMode = False
- ServerType = stAuto
- TransferType = ttBinary
- ProxyType = fpUserNoLogon
- OnDataTransferStart = msFTPClient1DataTransferStart
- OnDataTransferTerminate = msFTPClient1DataTransferTerminate
- OnDataTransferProgress = msFTPClient1DataTransferProgress
- OnLineSent = agFTP1LineTransmitted
- OnLineReceived = agFTP1LineTransmitted
- Left = 272
- Top = 224
- end
- end
-